\encoding{UTF-8}
\name{CloseDatasource}
\alias{CloseDatasource}
\title{
Close the Datasource
}
\description{
关闭指定的数据源。
}
\usage{
CloseDatasource(obj)
}
\arguments{
  \item{obj}{
  数据源对象。
}
}
\value{
关闭数据源成功后，返回NULL
}
\examples{
server <- system.file("/sampledata/ChangChun.udb", package="RSuperMap")
ds <- OpenDatasource(server, alias = "test", engine = "udb")
new.ds <- CloseDatasource(ds)
}
\keyword{ Datasource }% use one of  RShowDoc("KEYWORDS")
\keyword{supermap}